(inferior-lisp-prompt): Don't match more than one line.

diff --git a/lisp/progmodes/inf-lisp.el b/lisp/progmodes/inf-lisp.el
index 2f5b608f864bd7b86985d32395f9d859a035ac28..a05b3dcd3676bb59ce1c4092e968a7c4f8bca505 100644 (file)
--- a/lisp/progmodes/inf-lisp.el
+++ b/lisp/progmodes/inf-lisp.el
@@ -149,9 +149,9 @@ produces cosmetically superior output for this application,
 but it works only in Common Lisp.")
 
 ;;;###autoload
-(defvar inferior-lisp-prompt "^[^> ]*>+:? *"
+(defvar inferior-lisp-prompt "^[^> \n]*>+:? *"
   "Regexp to recognise prompts in the Inferior Lisp mode.
-Defaults to \"^[^> ]*>+:? *\", which works pretty good for Lucid, kcl,
+Defaults to \"^[^> \\n]*>+:? *\", which works pretty good for Lucid, kcl,
 and franz.  This variable is used to initialize `comint-prompt-regexp' in the 
 Inferior Lisp buffer.